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Our education, Linda Scott, will be conducting the final class on BASIC 
for beginners before our regular meeting on Saturday. The class begins 
at SPM. Be sure to bring your ATARI Basic manuals. 


Intermediate basic classes begin in October. Detail at the meeting. 


Club Library will be open from 3:39 to 4:ØØ and after our business 
meeting which begins at 4:99 PM. 


Be sure to look over the new literature library. A checkout system has 
been set up which allows MILATARI members to take material home. 


All exchange newsletters may be taken out in addition to current issues 
of InfoWorld, SOFTLINE, Mini-Micro Systems, small systems world, 
Personal Computing, and Popular COMPUTING. 


We also have a copie of De Re Atari a copy of the ATARI OS and Hardware 
manual available for checkout. 


2 Sep 1982 


MILATARI NEWSLETTER 


President’s RAM 


by Gary Nolan, Nilatari President 


First came Suamerfest, then Germanfest, Irishfest and 
Polishfest. And now comes CONPUTERFEST. Yes, on Sunday 
September 19th, the first Milwaukee Computerfest will be held 
at 3819 W. Michigan at Noon. Members of NILATARI will be 
there showing the ATARI systems, So stop by and say hello. 

de ve gotten some response to cur call for submissions to 
the newsletter but are still looking for program reviewers 
along with prograaming tips. 

Some changes in the library are comming. Some of them will 
be mentioned here others at the meeting. You will be able to 
buy copies of disk/cassettes at the meeting to avoid having 
to stand in line after the aeeting. Prices will be around $3 
for disks, with cassettes undecided for now. You”ll still be 
able to stand in line and get it free if you wish, but if the 
lines are too long and tiae runs short, well. Wayne Peters 
has resigned as librarian for personal reasons, and we would 
like to take this tiae to thank hia for the work he put into 
it. 80 we will be looking for a new librarian or two. Most 
clubs have a disk and cassette librarian and we will probably 
go to this system too. Also, most clubs do not have 
copyrighted software in thier libraries, we do and we ave 
some rules governing it. Donations aust be the original 
program and documentation only. Borrowing is done on a one 
program per person basis. We are in contact with other groups 
and are in the process of exchanging copies of non copyright 
material, so the library will be expanding in the near 
future. 

The VOICEBOX raffle will be discussed at the next meeting. 
If there is enough interest the drawing will be held at the 
October seeting. Chances will be $5 each with profits going 
to the club fund. Those unable to attend can call ae to find 
out if it will be held or not. 

Disks are on order and should be here by the 18th. We did 
order extra disks which will be sold at $19 for a box of ten. 

The Department of Defense has ordered 1,378 ATARI 
computers. Missle Command and Star Raiders as training 
prograas? Actually they were ordered for the education af 
dependents overseas. 

ATARI’s next computer? Rugors still abound. Latest is that 
ATARI will upgrade the 448 keybeard, drop the 844 and bring 
out a system to compete in the Comodore 64 price range. 
Couple this with the rumored small business machine and 
things get interesting. 

Did anybody notice what was missing from this months 
Creative Computing magazine? 

Remember, the programming classes meet at Jpa. This months 
class will continue the graphics lesson started last time. 

See you on the 18th...sssesecees 


Å Now Let's Access Hymn 


THIS SPACE FOR RENT 


X x * 
UNCLASSIFIED ADS 


IMILATARI will post ads for its members at no charge. Others 
$1.99 per issue. Send ad info to newsletter editor by Ist 
Saturday of month) 


B& WTV: Can be used as aonitor only - 319.89. Call Betty 
Norris at 347-5953, 


SOFTWARE: MILATAR! members Jim Luty and Bill Simotti are 
selling software at a discount to members. Call Jim at 
421-3135 or Bill Sisotti at 352-1798 for prices. 


OSCILLOSCOPE: Heathkit model I01Ø4 DC to 15HZ scope. New - 
$358 Will sell for $175. Call Bruce Chandler 9 1-594-3368. 


FORMS: 9 1/2 X 11 - blank - 1188 sheets - $12; DISK CASE: 
holds 199 diskettes - $15 (2 only); MXBØ RIBBON CARTRIDGES: - 
$7, reloads - $3; Call Dave Frazer - 542-7242 or see at 
September meeting 
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ATARI KEYBOARD INPUT — 
— THREE METHODS 
by Don Wilcox 


Let me share with you three methods for transfering data from the 
keyboard to the computer. Each method has its own adventures and 
limitations. Since the transfer of numerical values is less complex 
than that of strings, this article will deal primarily with string 
data. 


The first method uses the familar input command. The input command 
is simple to program and transfers all characters keyed in as a single 
string in one operation to the computer and simultaneously displays the 
string on the screen. As a limitation, the input command can transfer 
no more than 3 physical lines (1 logical line) to a maximum of 113 
characters per transfer. 


Program one demostrates the use of the input method by reading data 
into the string variable - NAMES. Most beginning programmers are 
familar with this approach. To create a string longer than 113 
characters requires concatenation (hooking together) of separate 
strings into one large string. See page 39 in the ATARI Basic Reference 
Manual. After entry of the data, the RETURN key must be pressed to 
complete the transfer into the string variable. This approach does not 
allow us to examine each charater as it is input to determine whether 
or not we wish to accept it as a valid input. 


The second method uses the GET command. This requires that we open 
the keyboard for input the same as we would open a file in the read 
mode (4). As an example: OPEN #1,4,9,"K:" where K: is the special 
file name for the keyboard. This method transfers one character at a 
time in decimal format to the computer without the necessity of 
pressing the RETURN key. The data actually transfered is not the 
Character pressed as in the input statement, but the decimal value of 
the charater. See Appendix C in your ATARI Basic Reference Manual for a 
list of the decimal values associated with each character. The entry of 
one character at a time allows us to edit each character as it is 
keyed. We can thus catch and prevent illegal or undesired characters 
from entering our program. To create a string of more than one 
character using the get command requires that we concatenate the 
characters as they are inputed, edited and transferred into the string 
variable — NAMES. This is readily accomplished by looping back to our 
get command until we have keyed in all the characters desired into the 
Variable — NAMES. This approach is demostrated in program two which 
uses the get command, allows only capital letters (A through Z) as 
valid data, converts the decimal numbers to their alphabetic form and 
then stores them in the string — NAMES 


(continued) 


MILATARI NEWSLETTER 4 Sep 1982 


ÅS you are aware, most keys on the keyboard can produce different 
Characters (capitals, lower case, graphic characters and control 
characters) depending on whether or not we have pressed the shift. 
CAP/LOWR, ATARI or ESCAPE key prior to a textual key (letters, numbers 
or special characters). 


You may not be aware that each key on the keyboard has its own 
unique key code number, excluding the SHIFT, CONTROL and BREAK keys. 
This unigue code number is not the same as the decimal numbers 
associated with each character as listed in Appendix C of the ATARI 
Basic Reference Manual. 


The third method uses the fact that each of the brown keys on the 
keyboard when pressed transfers its own unigue key code number into 
address 764 (decimal) in the computer memory. The value of the last key 
pressed remains in address 764 until a new key is pressed or we POKE a 
different number into the address 764. Initially, this address carries 
a value of 255. Page 5Ø in the ATARI Operating system User’s Manual 
lists the key code numbers associated with each key on the keyboard. If 
you do not have a copy of this manual, there is a program at the end of 
this article which will allow you to print out or display each 
character, its decimal equivalent and its unique key code. NOTE: The 
status of the yellow keys on the right side of the keyboard are stored 
in address 53279 (decimal). We are not concerned with these keys for 
the purpose of this article. 


The PEEK(764) method does not respond with a different key code if a 
combination of keys is pressed sequentially such as the ATARI key 
followed by a charater key. It only captures the key codes of the last 
key pressed. If however, the SHIFT key or the CONTROL key are pressed 
simultaneously with a charater key, a unique key code is captured for 
the simutaneous entry, although neither the SHIFT key nor the CONTROL 
key have an individual key code if pressed singly. This method does not 
capture a key code for a combination of keys pressed sequential ly as 
would be true of having pressed the ATARI or CAPS/LOWR keys followed 
sequentially by another key. It captures only the key code of the last 
key pressed. This individual key code is however different for each key 
depending upon whether or not the computer is in shift or control mode 
while another key is being pressed simultaneously. 


In order to determine which key was pressed, all we need do is 
PEEK(764). This will return the key code of the key just pressed. This 
method does not require us to open the keyboard as a file and does not 
require the pressing of the return key to transfer data to the 
computer. You may also note the absence of the usual keyboard "click" 
sound using this method. Because of the apparent randomness of the key 
code assignments to specific keys, this is not a readily usable 
approach for textual information input. It is a good approach for 
limited input such as a yes or no response to a question or a menu 
selection by inputting a number or letter to indicate your selection. 
This method works well for restricting acceptable data to a very few 


(continued) 
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Choices. Program three demonstrates the use of peeking location 764 as 
a means of reading data from the keyboard and restricting data input to 
only a few possibilities. 


Why use this third method in preference to the first two presented? 
There are three reasons: (1) The return key need not be pressed to 
initiate the transfer process; (2) The keyboard need not be opened as a 
file; and (3) This method can be more selective in shielding the 
program from unacceptable input characters. 


Run programs three, four and five. Prior to responding to the 
question "Are you ready, y or n?", accicently press either the 
CAPS/LOWR or ATARI keys, then input your answer y or n. 


You will find that programs four and five will not continue to a 
successful conclusion as will program three. This is due to the fact 
that we have only checked for a (Y or N) in the capital letter mode. 
The programs, four and five, will not accept (y or n) nor the reversed 
7, . N, or n. Rather than emcompassing all these possible variations 
of "y" and "n", it is more simple to use the PEEK(764) approach which 
will respond correctly no matter which of the four modes is used to 
input the response. 


For those who desire more information, read the Operating System 
Users Manual, especially pages 47-5Ø. As an aside, the key code is in 
the first six bits of the address 764 (starting from the right side). 
The left is set to 1 if the control key is pressed and the second to 
the leftmost bit is set to 1 if the shift key is pressed. 


99 REM PROGRAM ONE 

199 DIM NAMES$(15):REM SETS THE MAXIMUM NUMBER OF CHARACTERS 
FOR BE PUT INTO NAMES 

119 PRINT " TYPE IN A NAME, THEN PRESS RETURN":REM DISPLAYS 
INSTRUCTION TO USER ON THE SCREEN 

129 INPUT NAME$:REM ? INDICATED COMPUTER IS WAITING FOR INPUT FROM 
THE KEYBOARD 

13@ REM ONLY THE FIRST 15 CHARACTERS TYPED WILL BE PUT INTO NAMES, 
ANY OVER 15 WILL BE IGNORED, BUT NO ERROR 

149 REM MESSAGE WILL BE DISPLAYED 

15@ PRINT NAMES:REM NAME TYPED IN WILL BE DISPLAYED ON THE SCREEN 

169 GOTO 11Ø:REM RETURN TO INPUT REQUEST 


99 REM PROGRAM TWO 

199 DIM NAME$ (15) 

119 OPEN #1,4,9,"K:":REM OPENS KEYBOARD IN INPUT MODE (4) SAME AS 
A FILE 

129 GET #1,Q@:REM Q IS THE DECIMAL VALUE OF THE CHARACTER KEYED IN, 
NOT THE CHARACTER ITSELF 

13@ REM CHR$(Q) CONVERTS THE DECIMAL VALUE OF @ TO ITS CHARACTER 
FORM FOR DISPLAY ON THE SCREEN 


(continued) 
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149 IF Q<65 OR @>99 AND Q<>155 THEN 12Ø:REM REJECTS ALL INPUT 
EXCEPT 
CAPITAL LETTERS AND THE RETURN KEY 
150 REM 65=A; 99=Z; 
155=RETURN KEY (RETURN KEY USED TO TERMINATE GET 
OPERATION) 
169 ? CHR$ (Q) 5; :NAMES(LEN(NAMES +1)=CHR$(Q) : REM CHR G) CONVERTS 
DECIMAL VALUE OF @ INTO ITS CHARACTER FORM 
179 REM THEN CONCATENATES (HOOKS ON) EACH VALID CHARATER AS IT IS 
INPUT AND ACCEPTS AS VALID 
189 IF Q<>155 AND LEN(NAME$)<15 THEN 129: RENM IF THE RETURN KEY 
HAS NOT BEEN PRESSED AND THE STRING NAMES 
199 REM IS NOT YET FULL, PROGRAM WILL RETURN TO LINE 129 FOR MORE 
CHARACTERS TO ADD TO NAMES 
209 PRINT :PRINT NAMES:CLOSE #1 
219 NAME$="":GOTO 119:REM ERASE DATA IN NAMES AND RETURNS TO 
BEGINNING OF PROGRAM, PRESS RESET TO TERMINATE. 


99 REM PROGRAM THREE 
199 PRINT "ARE YOU READY, Y OR N" 
119 G=PEEK(764):IF G=255 THEN 11Ø:REM PROGRAM REMAINS AT LINE 119 
UNTIL A KEY IS PRESSED 
126 POKE 764,255:REM RETURN LOCATION 764 TO ITS ORIGINAL NULL OR 
EMPTY VALUE 
130 IF G<>35 AND G<>43 THEN 11Ø:REM ONLY THE (N) OR THE (Y) KEYS 
WILL 
ALLOW PROGRAM TO CONTINUE. ANY OTHER 
149 REM PRESSED WILL CONTINUE TO RETURN TO LINE 119. KEY CODE FOR 
N IS 35; 
KEY CODE FOR Y IS 43. 
15Øø IF G=35 THEN PRINT "ANSWER WAS NO" 
169 IF G=43 THEN PRINT “ANSWER WAS YES" 
179 GOTO Ye: REH ALLOWS PROGRAM TO RUN AGAIN. PRESS RESET TO STOP 


99 REM PROGRAM FOUR 

196 DIM Q$(1) 

11ø PRINT "ARE YOU READY, Y OR N?" 

115 PRINT “ENTER RESPONSE THEN PRESS RETURN" 

120 INPUT Gs: IF Q$<>"N" AND @$<>"Y" THEN 12Ø:REM PROGRAM REMAINS 


LINE 129 UNTIL EITHER A (Y) OR AN (N) IS INPUT 
130 IF Q$="Y" THEN PRINT "ANSWER WAS YES" 
149 IF Q$="N" THEN PRINT "ANSWER WAS NO" 
159 GOTO 119:REM ALLOWS PROGRAM TO RUN AGAIN. PRESS RESET TO STOP 


94 REM PROGRAM FIVE 

199 OPEN #1,4,9,"K:" 

119 PRINT "ARE YOU READY, Y OR N" 

129 GET #1,Q:IF Q@<>78 OR @<>89 THEN 12ø:REM 78 IS DECIMAL CODE FOR 


(continued) 
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- N;89 IS FOR Y 
' 139 IF Q=78 THEN PRINT “ANSWER WAS NO" 
149 IF Q=89 THEN PRINT “ANSWER WAS YES" 
15@ GOTO 119:PRESS RESET TO STOP PROGRAM 


5 REM DON WILCOX AUGUST 25, 1982 
6 REM CREATE A TABLE OF CHARACTERS, DECIMAL CODES AND KEY CODES 


FOR ATARI 
19 LPRINT "CHARACTER DECIMAL KEY" 
20 LPRINT " CODE CODE CODE" 
3Ø LPRINT " --—- ---- ----" 


199 OPEN #1,4,9,"K:":DIM Q%(3) 

119 ? "PRESS A KEY":? 

120 N=PEEK(764):IF N=255 THEN 13Ø 

139 GET #1,Q:POKE 764, 255: Q$=CHR$(Q):IF @=27 OR Q=155 OR Q=127 
THEN Q$=" * 

131 IF Q=27 THEN Q$="ESC" 

132 IF Q=127 THEN Q$="TAB" 

133 IF Q=155 THEN Q$="RET" 

134 IF Q=32 THEN Q$="SPA" 

135 ? "CHARACTER DECIMAL KEY" 


137 2 CODE CODE CODE" 
138 22•»—'0!edV— — —— 

149 ? “ *; 20 * 3; 15 * N 

180 LPRINT " "sQ$;" 103 "EN 


— 169 GOTO 119 
179 REM DELETE LINES 19, 29, 3Ø AND 15@ IF YOU DO NOT HAVE A 
PRINTER 


x x x x c x Ic x x x Ac c K Ac x c x 
Advertisement --- Advertisement 


Micra Computers and Magic Ince. 
would like to thank all our ATARI customers who have purchased a 
computer from us with a super fall sale: 


Atari 819 disk drive $419.90 


Epson MX8Ø FT w/Graftax $475.99 Computers for Business 
microcomputens Home & School 


@orrle x NorthStar — 
Naar 


12 SALES * SERVICE 


WAUKESHA ; SOFTWARE © SUPPORT 
sproof of purchase may be required 


tproducts may have to be ordered 


*Also opennig October 4th - our new learing center 
%Call for more information 


548-9799 
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CONTEST!!! next meeting. 


BRAIN FUZZLE 
BASIC SOLUTION: 
This feature will appear in the newsletter each month. 


Monthly, a new puzzle will be presented along with a review 19 M=Ø 

of the previous months” puzzle. 15 N=Ø 
28 K=(N+8) / 

The puzzles are selected to show you ways to have fun and 3Ø IF KO>INTIK) THEN 5Ø 

learn with your computer. The proper method to solve these 4@ PRINT N 

puzzles requires the writing of a coaputer program to find 3Ø M=M+1 

the answer. To further encourage you, we Will award the first ég N=114M 

winner of each contest a blank disk or tape - their choice! 78 IF N>1ØØ THEN 96 
89 6070 29 

What we would like (besides the right answer) is a fem 96 END 

tidbits about how you solved the problem, such as: what 

language, how many stateaents, and how long did it take the FORTRAN SOLUTION 


computer to arrive at the answer. 
Coluans: 12345 6 7 


The correct entry bearing the earliest postmark will be 


considered the winner. No entries accepted after midnight, INTEGER M,N 
Septesber 3#, 7982. All entries become the property of REAL K 
MILATARI. Winner will be awarded one blank disk or tape. In M=Ø 
the event of a tie, more than one winner may be selected. N=4 
Respond only by mail. No phone calls please. 2 K=(N+8.)/6, 
IF (K. M. AINT(K)) GOTO 5 
Address your entry to: WRITE (6, 1990 N 
199 FORMAT (914) 
MILATARI PUZZLE 5 M=M+1 
P. O. Box 1191 N=1 14M 
Waukesha, WI 33187 IF N. 67. 188) STOP 
60 10 2 
RKKKKKKKEX END 
PUZZLE # 2 
x X * 
XXXXXKXKXXX 
NEWSLETTERS 


THE FYRAMID OF CANNONBALLS 
Newsletters which are received form other groups will be 
From a collection of 19,998 cannonballs, å square-based cataloged in our club library and are avaliable for any 
pyramind is built with a single cannonball on top and a member at our monthly metting. We are currently receiving 
square number on each layer. How many layers can be made? And newsletters from: 

how many cannonballs will be left over? 

the Atari Computer Association of Orange County, Ca. 

the Madison Wisconsin Atari Users 


PUZZLE # 1 WINNER the Michigan Atari Computer Enthusiasts 
the West Valley ATARI Users Group 
Cur winner with the first correct answer to puzzle # I is the Twincity ATARI Interest Group 
Steven Booth. The two correct answers subaitted by Steven are the ATARI Computer Club of Toledo 
22 and 88. the Waterloo ATARI users Group 
the Jersey ATARI Computer Group — 
Steven used basic BASIC. It took Steven about 29 minutes to the Birmingham Atari Group 
compute the answers ganuallly and 2 seconds for his ATARI. the Austin Atari Coaputer Enthusiasts 
Congradulations Steve - Pick up your tape or diskette at the We thank those groups for their participation in newsletter 


exchange. 


